home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CICA 1995 August
/
CICA - The Ultimate Collection of Shareware for Windows (Disc 2) (August 1995).iso
/
disc2
/
programr
/
atre27.exe
/
ATREE_27
/
OCRDEMO2
/
OCR.RC
< prev
next >
Wrap
Text File
|
1992-08-01
|
14KB
|
227 lines
// remember to include \atree_27\include\
// in your include path!
/*****************************************************************************
**** ****
**** ocr.rc ****
**** ****
**** atree release 2.7 for Windows ****
**** Adaptive Logic Network (ALN) simulation program. ****
**** Copyright (C) M. Thomas, N. Sanche, W.W. Armstrong 1991, 1992 ****
**** ****
**** License: ****
**** A royalty-free license is granted for the use of this software for ****
**** NON_COMMERCIAL PURPOSES ONLY. The software may be copied and/or ****
**** modified provided this notice appears in its entirety and unchanged ****
**** in all derived source programs. Persons modifying the code are ****
**** requested to state the date, the changes made and who made them ****
**** in the modification history. ****
**** ****
**** Patent License: ****
**** The use of a digital circuit which transmits a signal indicating ****
**** heuristic responsibility is protected by U. S. Patent 3,934,231 ****
**** and others assigned to Dendronic Decisions Limited of Edmonton, ****
**** W. W. Armstrong, President. A royalty-free license is granted ****
**** by the company to use this patent for NON_COMMERCIAL PURPOSES to ****
**** adapt logic trees using this program and its modifications. ****
**** ****
**** Limited Warranty: ****
**** This software is provided "as is" without warranty of any kind, ****
**** either expressed or implied, including, but not limited to, the ****
**** implied warrantees of merchantability and fitness for a particular ****
**** purpose. The entire risk as to the quality and performance of the ****
**** program is with the user. Neither the authors, nor the ****
**** University of Alberta, its officers, agents, servants or employees ****
**** shall be liable or responsible in any way for any damage to ****
**** property or direct personal or consequential injury of any nature ****
**** whatsoever that may be suffered or sustained by any licensee, user ****
**** or any other party as a consequence of the use or disposition of ****
**** this software. ****
**** Modification history: ****
**** ****
**** 92.03.07 Release 2.6, Monroe Thomas ****
**** 92.01.08 Release 2.7, Monroe Thomas ****
**** ****
*****************************************************************************/
#ifndef WORKSHOP_INVOKED
#include <windows.h>
#include <bwcc.h>
#endif
#include "ocr.rch"
OCR_LETTER_A BITMAP lettera.bmp
OCR_LETTER_L BITMAP letterl.bmp
OCR_LETTER_N BITMAP lettern.bmp
OCR_LETTER_CLEAR BITMAP clear.bmp
OCR_LIGHTOFF BITMAP lightoff.bmp
OCR_LIGHTON BITMAP lighton.bmp
1010 BITMAP cwup.bmp
3010 BITMAP cwdn.bmp
5010 BITMAP cwus.bmp
1011 BITMAP ccup.bmp
3011 BITMAP ccdn.bmp
5011 BITMAP ccus.bmp
#include "atree.rc"
OCR DIALOG 0, 0, 320, 219
CAPTION "ALN Character Recognition"
FONT 10, "System"
CLASS "bordlg_ocr"
STYLE WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX
BEGIN
DEFPUSHBUTTON "&Forward >>", OCR_START, 10, 145, 58, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "&Stop!", OCR_STOP, 74, 145, 58, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "<< Re&verse", OCR_REVERSE, 138, 145, 58, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "&Train", OCR_TRAIN, 10, 160, 58, 13, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "For&get", OCR_FORGET, 74, 160, 58, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "&Reset", OCR_RESET, 138, 160, 58, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "&Help", OCR_HELP, 10, 175, 58, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "&About", OCR_ABOUT, 74, 175, 58, 13, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "&Quit", OCR_QUIT, 138, 175, 58, 13, BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "Edit #&1...", OCR_EDITA, 147, 64, 46, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "Edit #&2...", OCR_EDITL, 205, 64, 46, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
PUSHBUTTON "Edit #&3...", OCR_EDITN, 263, 64, 46, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 210, 149, 94, 36
RTEXT "% Correct: ", -1, 216, 155, 48, 8, SS_RIGHT | WS_CHILD | WS_VISIBLE | WS_GROUP
RTEXT "% Incorrect: ", -1, 216, 168, 48, 8, SS_RIGHT | WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "", OCR_CORRECT, 270, 155, 28, 8, SS_LEFT | WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "", OCR_INCORRECT, 270, 168, 28, 8, SS_LEFT | WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 7, 7, 131, 131
CONTROL "", OCR_BITMAP, "TBitmapControl", WS_CHILD | WS_VISIBLE, 9, 9, 127, 127
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 42, 198, 236, 15
CTEXT "", OCR_STATUS, 48, 201, 225, 8
ICON "atreeico", -1, 15, 197, 16, 16
CONTROL "", OCR_DRAW_A, "TBitmapControl", 0 | WS_CHILD | WS_VISIBLE, 146, 9, 48, 48
CONTROL "", OCR_DRAW_L, "TBitmapControl", 0 | WS_CHILD | WS_VISIBLE, 204, 9, 48, 48
CONTROL "", OCR_DRAW_N, "TBitmapControl", 0 | WS_CHILD | WS_VISIBLE, 262, 9, 48, 48
CONTROL "", OCR_LIGHTBULB_A, "TBitmapControl", 0 | WS_CHILD | WS_VISIBLE, 146, 88, 48, 48
CONTROL "", OCR_LIGHTBULB_L, "TBitmapControl", 0 | WS_CHILD | WS_VISIBLE, 204, 88, 48, 48
CONTROL "", OCR_LIGHTBULB_N, "TBitmapControl", 0 | WS_CHILD | WS_VISIBLE, 262, 88, 48, 48
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 143, 86, 54, 52
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 201, 86, 54, 52
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 259, 86, 54, 52
ICON "atreeico", -1, 289, 197, 16, 16
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 143, 7, 54, 52
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 201, 7, 54, 52
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 259, 7, 54, 52
END
OCR_ABOUTDLG DIALOG 41, 34, 127, 101
CAPTION "About atree OCR"
CLASS "BORDLG"
STYLE WS_POPUP | WS_VISIBLE | WS_CAPTION
BEGIN
CONTROL "Button", IDOK, "BorBtn", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 47, 75, 32, 20
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 8, 6, 111, 57
ICON "atreeico", -1, 23, 16, 16, 16, SS_ICON | WS_CHILD | WS_VISIBLE
CTEXT "atree Character Recognition", -1, 56, 11, 49, 25, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "⌐ 1992, Monroe M. Thomas", -1, 11, 40, 106, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "and Neal A. Sanche", -1, 11, 48, 106, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_HDIP | WS_CHILD | WS_VISIBLE, 0, 69, 127, 3
END
OCR_TRAINSET DIALOG 45, 34, 136, 55
CAPTION "OCR Demo"
CLASS "BORDLG"
STYLE WS_POPUP | WS_VISIBLE | WS_CAPTION
BEGIN
CONTROL "", 101, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 8, 6, 120, 39
ICON "atreeico", -1, 15, 17, 16, 16, SS_ICON | WS_CHILD | WS_VISIBLE
LTEXT "Building training set ...", -1, 38, 17, 49, 17
CONTROL "", OCR_TRAINPCT, "STATIC", SS_CENTER | WS_CHILD | WS_VISIBLE | WS_GROUP, 90, 22, 29, 8
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 88, 18, 32, 16
END
pencilcur CURSOR pencil.cur
OCR_EDITCHAR DIALOG 30, 17, 183, 176
STYLE WS_POPUP | WS_VISIBLE | WS_CAPTION
CLASS "bordlg"
CAPTION "Edit Character"
BEGIN
CONTROL "", IDOK, "BorBtn", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 141, 43, 32, 20
CONTROL "", IDCANCEL, "BorBtn", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 141, 76, 32, 20
CONTROL "Button", IDHELP, "BorBtn", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 141, 109, 32, 20
CONTROL "Button", IDCOUNTER, "BorBtn", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 4, 149, 32, 20
CONTROL "", ID_EDITSCRL, "EditScroll", 0 | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 40, 156, 52, 11
CONTROL "Button", IDCLOCKWISE, "BorBtn", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 96, 149, 32, 20
CTEXT "", ID_COORDX, 24, 131, 24, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "", ID_COORDY, 95, 131, 24, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Rotation Angle:", -1, 39, 147, 55, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 79, 129, 46, 12
CONTROL "", -1, "BorShade", 3 | WS_CHILD | WS_VISIBLE, 131, 0, 2, 176
ICON "atreeico", -1, 149, 15, 16, 16
CONTROL "", OCR_DRAWCHAR, "TBitmapDrawControl", 0 | WS_CHILD | WS_VISIBLE, 10, 11, 113, 113
CTEXT "X:", -1, 10, 131, 11, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", 1 | WS_CHILD | WS_VISIBLE, 8, 9, 117, 117
CONTROL "", -1, "BorShade", 1 | WS_CHILD | WS_VISIBLE, 39, 155, 55, 14
CTEXT "Y:", -1, 81, 131, 11, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 8, 129, 46, 12
END
OCR_DRAWHELP DIALOG 13, 26, 164, 118
CAPTION "Edit Character Help"
FONT 8, "Helv"
CLASS "bordlg"
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
BEGIN
CONTROL "Button", IDOK, "BorBtn", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 64, 89, 36, 24
CONTROL "", 102, "BorShade", BSS_HDIP | WS_CHILD | WS_VISIBLE, 0, 84, 164, 2
CONTROL "", 103, "BorShade", 1 | WS_CHILD | WS_VISIBLE, 4, 4, 156, 77
CTEXT "The mouse button commands useful for editing a character are as follows:", -1, 10, 9, 144, 19, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "Left Button", -1, 59, 34, 38, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Single Click:", -1, 11, 48, 42, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Double Click:", -1, 8, 62, 45, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "Right Button", -1, 107, 34, 43, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "Draw", -1, 57, 48, 42, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "Erase", -1, 105, 48, 47, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "Fill", -1, 56, 62, 44, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CTEXT "Clear", -1, 105, 62, 47, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", 104, "BorShade", 1 | WS_CHILD | WS_VISIBLE, 53, 45, 101, 28
CONTROL "", 105, "BorShade", BSS_HBUMP | WS_CHILD | WS_VISIBLE, 53, 59, 102, 2
CONTROL "", 106, "BorShade", BSS_VBUMP | WS_CHILD | WS_VISIBLE, 101, 45, 2, 28
END
OCR_TRAINDLG DIALOG 74, 10, 251, 182
CAPTION "Training Parameters"
CLASS "bordlg"
STYLE WS_POPUP | WS_CAPTION
BEGIN
CONTROL "Button", IDOK, "BorBtn", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 207, 63, 32, 20
CONTROL "", IDCANCEL, "BorBtn", BS_PUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 207, 101, 32, 20
EDITTEXT ID_TREESIZE, 17, 16, 40, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
EDITTEXT ID_VOTERS, 17, 45, 40, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
EDITTEXT ID_NUMSAMPLES, 17, 74, 40, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
EDITTEXT ID_MAXEPOCHS, 17, 103, 40, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
EDITTEXT ID_MINCORRECT, 17, 132, 40, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
EDITTEXT ID_MAXROTATION, 17, 161, 40, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 15, 13, 167, 18
LTEXT "Tree Size", -1, 15, 5, 166, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "Sets the size of each ALN. Smaller trees generalize better.", -1, "STATIC", WS_CHILD | WS_VISIBLE | WS_GROUP, 61, 14, 116, 16
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 15, 42, 167, 18
LTEXT "Number of Voters", -1, 15, 34, 166, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Sets how many ALN's will decide each character.", -1, 61, 43, 116, 16, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 15, 71, 167, 18
LTEXT "Number of Samples per Character", -1, 15, 63, 166, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Sets number of presentations of each character that will be made.", -1, 61, 72, 116, 16, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 15, 100, 167, 18
LTEXT "Maximum Number of Epochs", -1, 15, 92, 166, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Sets maximum number of sets of presentations to the ALN's.", -1, 61, 101, 116, 16, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 15, 129, 167, 18
LTEXT "Minimum Percent Correct", -1, 15, 121, 166, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Sets minimum % of training set ALN must get correct to finish training.", -1, 61, 130, 116, 16, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", -1, "BorShade", BSS_GROUP | WS_CHILD | WS_VISIBLE, 15, 158, 167, 18
LTEXT "Maximum Skew Angle (degrees)", -1, 15, 150, 166, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
LTEXT "Sets maximum character skew angle that ALN's will train on.", -1, 61, 159, 116, 16, WS_CHILD | WS_VISIBLE | WS_GROUP
CONTROL "", 106, "BorShade", 3 | WS_CHILD | WS_VISIBLE, 194, 0, 2, 182
ICON "atreeico", -1, 215, 24, 16, 16
END
def_aln ALN ocr.tre